∃~∞;¬[& _U*U*UPROGNCOND↓STATUS↓NOFEATURE↓NOLDMSG↓TERPRI↓MSGFILESPRINCPNPUTU*UjuQUOTE⊂;Load⊂ing M⊂ACROS⊂ 6∧¬¬εεπ⊂α⊂↓⊂↓␈␈pSETQλπ¬π⊂↓⊂↓␈␈x↓DEFPROPU:U*UTα+INTERNAL-STRING-MARKERλπ		⊂α␈␈x↓ALPHALESSPLISPV2071↓PUTPROP⊂MACRO⊂Sw:U*U∧¬⊂↓⊂↓⊂↓␈␈pλ
¬
⊂↓⊂↓␈␈xλ
		⊂α␈␈x6↓VERSIONPUSH↓LAMBDAXORW*U.UαFILE-EXIT-FUNCTIONS↓↓αα⊂↓ββ⊂↓∧πβ⊂↓⊂↓⊂↓↓
↓
⊂↓¬⊂↓⊂↓¬
⊂↓¬
⊂↓¬∞⊂↓⊂α⊂↓¬	⊂↓∞¬∂∂⊂⊂∂λ

∞⊂α⊂↓⊂↓⊂↓⊂⊂↓⊂↓⊂↓¬
⊂↓⊂α␈␈x↓SETSYNTAX#MACROTYI⊃¬⊃⊂↓¬∩⊂↓¬∩⊂↓⊂α␈␈x:DOU*U*ULLISTREADCONSNOT=⊂≥↓TYIPEEKSELW*U*U↓NREVERSE⊃¬∪⊂↓¬∩⊂↓¬∂∪∀∀∃⊂⊂↓∃∃⊂∀⊂↓⊂↓⊂⊗⊗↔↔⊂⊂↓⊂↓∃¬_⊂↓_∀⊂↓⊂↓⊂↓∩⊂⊂α⊂↓⊂↓⊂α␈␈x<⊂⊂⊂≡<=SNLEQU:]*W>↓SELECTOR⊃¬→⊂↓¬∩⊂↓¬∂↓⊗→↔⊂⊂↓¬→⊂↓⊂↓⊗~↔⊂⊂↓∩⊂¬~⊂↓⊂↓	∪⎇∃⊂∃⊂⊂↓⎇⊂⊂↓≤¬≤⊂↓⎇⊂↓∃¬≥⊂↓_⎇⊂↓⊂↓⊂↓λ⎇∃⎇⎇⊂↓⊂↓⊂α⊂↓⊂α⊂↓⊂↓⊂α␈␈x>=⊃¬≤⊂↓¬∩⊂↓¬∂↓⊗⊗~↔⊂⊂↓⊂↓¬≤⊂↓⊂↓	∩⊂¬≥⊂↓⊂↓⊂↓⊂↓⊂↓⊂α␈␈xIBASE⊂¬BASEλ≡≡∨≡⊂α␈␈xU⊂w*U↓DEFINE-MACROSUBR &∩β&βx _DEFUN↓LAMBINDCADRCDRU*U*WVLNULLLIST*CDDRATOMCARCAARCADAR !∩∂⊂∪∀!∂⊂↓"∀⊂↓⊂↓⎇⊂"⊂⊂↓#∀⊂↓λ"_"⊂↓⎇_⎇⊂↓⊂α##¬∂⊂↓"$∂⊂↓⊂α⎇⊂↓⊂↓↓$%∀⊂↓⊂↓λ"∃%∀⊂↓"⊂↓⎇∃⎇⊂↓⊂α⊂↓	λ"∃%∀⊂↓"⊂↓⎇∃&∀⊂↓⎇⊂↓⊂α⊂↓⊂↓⊂α⊂α␈␈xU:].U↓LAMBIND*PROG &∩∂⊂∪∀!∂⊂↓"∀⊂↓⊂↓⎇⊂"⊂⊂↓#∀⊂↓λ"_"⊂↓⎇_⎇⊂↓⊂α#∀¬∂⊂↓"#¬'⊂↓¬⊂↓$∂⊂↓⊂α⊂α⎇⊂↓⊂↓↓$%∀⊂↓⊂↓λ"∃%∀⊂↓"⊂↓⎇∃⎇⊂↓⊂α⊂↓	λ"∃%∀⊂↓"⊂↓⎇∃&∀⊂↓⎇⊂↓⊂α⊂↓⊂↓⊂α⊂α␈␈xPROGB '∩∂⊂∪∀!∂⊂↓"∀⊂↓⊂↓⎇⊂"⊂⊂↓#∀⊂↓λ"_"⊂↓⎇_⎇⊂↓⊂α##¬∂⊂↓"$∂⊂↓⊂α⎇⊂↓⊂↓↓$%∀⊂↓⊂↓λ"∃%∀⊂↓"⊂↓⎇∃⎇⊂↓⊂α⊂↓	λ"∃%∀⊂↓"⊂↓⎇∃&∀⊂↓⎇⊂↓⊂α⊂↓⊂↓⊂α⊂α␈␈x↓PROGB* (∩∂⊂∪∀!∂⊂↓"∀⊂↓⊂↓⎇⊂"⊂⊂↓#∀⊂↓λ"_"⊂↓⎇_⎇⊂↓⊂α#∀¬∂⊂↓"#¬'⊂↓¬⊂↓$∂⊂↓⊂α⊂α⎇⊂↓⊂↓↓$%∀⊂↓⊂↓λ"∃%∀⊂↓"⊂↓⎇∃⎇⊂↓⊂α⊂↓	λ"∃%∀⊂↓"⊂↓⎇∃&∀⊂↓⎇⊂↓⊂α⊂↓⊂↓⊂α⊂α␈␈x↓MAPANDCADDRU:U.UIFN↓RETURN (∩∂⊂∀¬∪⊂↓∀#¬∀⊂↓)∂⊂↓¬"∀⊂↓⊂⊂↓⊂α⊂↓¬#∀⊂↓	⊂↓⊂↓#¬)⊂↓#!∂⊂↓¬%∀⊂↓⊂⊂↓⊂↓¬*⊂↓⊂⊂↓⊂α⊂α⊂α␈␈x↓MAPAND2M↓CADDDR *∩∂⊂∀¬∪⊂↓∀#¬∀⊂↓)∂⊂↓¬"∀⊂↓⊂⊂↓⊂α#¬+⊂↓+∂⊂↓¬"+⊂↓⊂⊂↓⊂α⊂↓¬#∀⊂↓	⊂↓⊂↓#¬)⊂↓#!∂⊂↓¬%∀⊂↓%+⊂↓⊂↓⊂↓⊂↓¬*⊂↓⊂⊂↓⊂α⊂α⊂α␈␈xMAPORDUMU:UjwIF↓FUNCALL ,∩∂⊂∀¬∪⊂↓##¬∀⊂↓)∂⊂↓¬"∀⊂↓⊂⊂↓⊂α¬,⊂⊂⊂↓⊂↓¬#∀⊂↓⊂⊂↓#¬-⊂↓∀¬λ⊂↓¬,⊂↓#¬-⊂↓!∂⊂↓¬%∀⊂↓⊂⊂↓⊂α⊂α¬*,⊂↓⊂⊂↓⊂α⊂α⊂α␈␈x↓MAPLAC↓RPLACA .∩∂⊂∀¬∪⊂↓¬∀⊂↓)∂⊂↓¬"∀⊂↓⊂↓¬#∀⊂↓⊂↓∀¬.⊂↓¬∀⊂↓#!∂⊂↓¬%∀⊂↓⊂⊂↓⊂↓⊂α⊂β⊂α␈␈xCDDDR -∩∂⊂↓#/∂⊂↓⊂↓∀¬↓⊂↓∀!∂⊂↓)∂⊂↓⊂↓⊂↓⊂↓	∀¬↓⊂↓∀!∂⊂↓)∂⊂↓⊂↓#¬	⊂↓/∂⊂↓⊂↓⊂α⊂↓⊂↓⊂α␈␈x )∩∂⊂↓#/∂⊂↓⊂↓∀¬↓⊂↓∀∀¬⊗⊂↓!∂⊂↓⊂↓)∂⊂↓⊂↓⊂↓⊂↓	∀¬↓⊂↓∀∀¬⊗⊂↓!∂⊂↓⊂↓)∂⊂↓⊂↓#¬	⊂↓/∂⊂↓⊂↓⊂α⊂↓⊂↓⊂α␈␈xW*]*WPUT /∩∂⊂#¬⊂↓"∂⊂↓⊂↓⊂α␈␈xREM↓REMPROP 0∩∂⊂#¬0⊂↓"∂⊂↓⊂↓⊂α␈␈xIANDBOOLE⊂ 1∩∂⊂#¬1⊂↓¬2⊂↓"∂⊂↓⊂α⊂α␈␈xU:]*uIOR⊂β 2∩∂⊂#¬1⊂↓¬3⊂↓"∂⊂↓⊂α⊂α␈␈xXOR 3∩∂⊂∀¬⊗⊂↓#¬≤⊂↓"∂⊂↓⊂↓⊂↓⊂α␈␈xCOPYSUBST 4∩∂⊂∀¬4⊂↓¬⊂↓¬⊂↓!∂⊂↓⊂α⊂α␈␈xCOPYPu+]ju 5∩∂⊂∀¬∃⊂↓∀¬%⊂↓!∂⊂↓⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂α⊂α␈␈xCOPYL↓APPEND 5∩∂⊂#¬6⊂↓!∂⊂↓¬⊂⊂↓⊂α⊂α␈␈x ≥∩∂⊂∀¬⊗⊂↓∀¬→⊂↓!∂⊂↓)∂⊂↓⊂α⊂↓⊂α␈␈x ~∩∂⊂∀¬⊗⊂↓∀¬≤⊂↓!∂⊂↓)∂⊂↓⊂α⊂↓⊂α␈␈xECONS 6∩∂⊂∀¬6⊂↓!∂⊂↓∀¬∀⊂↓)∂⊂↓⊂↓⊂α⊂α␈␈x↓CAAADARW+U.W↓CAAADR 7∩∂⊂∀¬7⊂↓∀¬%⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CAAADDR 8∩∂⊂∀¬7⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CAADAAR↓CAADAR 8∩∂⊂∀¬9⊂↓∀¬%⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CAADADR 9∩∂⊂∀¬9⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈xU:UjW↓CADAAAR↓CADAAR :∩∂⊂∀¬:⊂↓∀¬%⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CADADDR↓CADADR ;∩∂⊂∀¬;⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CADDAAR↓CADDAR <∩∂⊂∀¬<⊂↓∀¬%⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈xW+UjW↓CADDADR =∩∂⊂∀¬<⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CADDDAR =∩∂⊂∀¬+⊂↓∀¬%⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CADDDDR >∩∂⊂∀¬+⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CDADADR↓CDADAR >∩∂⊂∀¬?⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈xU:Uju↓CDADDDR↓CDADDR ?∩∂⊂∀¬@⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓CDDDDDR↓CDDDDR @∩∂⊂∀¬A⊂↓∀¬"⊂↓!∂⊂↓⊂↓⊂↓⊂α␈␈x↓MOBJECTSλA⊂↓␈␈xMODEU+]*w↓C-MODE↓S-MODE↓A-MODEλBBCC⊂↓B⊂α␈␈x B∩∂⊂#¬∀⊂↓"∂⊂↓⊂↓⊂α␈␈xC← C∩∂⊂↓≤¬D⊂↓)∂⊂↓⊂↓∀¬%⊂↓!∂⊂↓⊂↓⊂↓≤¬_⊂↓)∂⊂↓⊂↓∀¬!⊂↓!∂⊂↓⊂↓⊂↓≤¬D⊂↓)∂⊂↓⊂↓∀¬)⊂↓!∂⊂↓⊂↓⊂↓⊂α⊂α␈␈x C∩∂⊂↓≤¬D⊂↓)∂⊂↓⊂↓∀¬.⊂↓¬!∂⊂↓⊂↓+∂⊂↓⊂α⊂↓≤¬_⊂↓)∂⊂↓⊂↓∀¬.⊂↓∀¬"⊂↓!∂⊂↓⊂↓+∂⊂↓⊂α⊂↓≤¬D⊂↓)∂⊂↓⊂↓∀¬.⊂↓∀¬$⊂↓!∂⊂↓⊂↓+∂⊂↓⊂α⊂↓⊂α⊂α␈␈xU*UjU↓DEFMODEMEMQ↓DEFINE-MODEMAPCEVAL E∩∂⊂!≥E¬≥⊂↓A∂⊂↓⊂↓⊂↓⊂F!∂⊂↓+∂⊂↓⊂↓F¬G⊂↓A∂⊂↓⊂↓∀¬¬⊂↓!∂⊂↓⊂↓⊂α⊂α␈␈xNAME↓EXPLODEC-U*U 1↓*APPEND↓IMPLODEADEFCDEFSDEFA-,↓αG↓@
3,8↓βαH $λ,8DH⊂↓␈␈zα⊂C$fβ∧IβαI ∧`,8)LS_⎇H⊂↓␈␈zα⊂G$fβ∧IβαI ∧g␈␈,8JH⊂↓␈␈zα⊂Bdfβ∧IβαI,8↓@εβ αg␈~βαJ $λ αg␈␈β∧∨ αg␈~βαK $λ αg␈␈_0ββ∧∨ αg␈~βαK $λ α`β∧∨ α`-,__d↓ ∧g␈␈-,→ ∧g␈␈-,→ &B $λ αG→↓@kUβε αG/_απ␈␈+αλ` _↓BASDEFC1α↓D02,8 *∂-,↓
LβαL-,_∂⊂␈␈zα =$fβ⊂εβ-,→ $∂-,→/_π␈␈+α](ελ	( ⊂→↓C-ATOM↓STRUCT,8(Bπ␈{7 λ¬+# α`β⊂⊂ -,≤ $¬-,→+Q[β`0B≥+. ε Z¬`Z∧⊂Z∧⊂4D)[α⊂-,_ $¬-,0H@1→+Q αL-,_ $"-,→ BLβ⊂∀
-,_ $%-,→+Q0B$+7 $!_@0Zβ`,_α-,_ $¬-,→-,2↓Jε(_ $¬-,→∃¬∀⊂↓"∂⊂↓⊂↓⊂␈␈zα ~Qe∀t-,_¬M⊂↓␈␈zα ?%J*$-,2↓BA→ $∀-,→+Q0B∃+@Zβ`[αλ_00βαL,8Zβg␈␈Zαλ[αλβαL-,_,X↓β∀@0-,→¬∃⊂↓␈␈zα N
Iq-,→ $∀-,→+Q @`λ0B∀+LZβ`,8,8π␈␈6@g␈␈+G α`~AHελβα_¬∀⊂↓␈␈zα ∞lNj⊃-,→ $∀-,→+K[βg␈␈_↓@λβαL ∧`-,_Z¬g␈␈ B` Dg␈␈+B/_↓0P @1π␈␈+Q0BM+OZ¬` "∀-,_βαLλ↓Hεβ+Q α`-,≤ $¬-,→/_π␈␈¬i
3 ,x	H ⊂∨DEFS1 &!∂⊂↓␈␈zα N∃↔∀@βεNβα_ $↓-,0→ dβ→-,_∂⊂␈␈zα =$f-,→ $∂-,→¬jTε⊂,x	0 ⊂RMODESGETSELS-,↓∧L,8↓B0,8↓(Bπ␈{7 λ¬+] "_-,ε+↓Cα∧αβ[βg␈␈0B≥+{Z¬g␈␈Z∧⊂[∧⊂ αG-,_ ε2 $N,8Zβg␈␈[αλβ∧O,X↓-,→ &N` $λZβg␈␈[αλβεZ¬g␈␈Z∧⊂[∧⊂Zβg␈␈[αλβ⊂∧0β-,_ $O,8 αGβ∧O,X↓-,→ λd∀ &O $λ αGβε7B≥+r $≥Zβg␈␈[αλ_@2β∧∨Zβg␈␈[αλ-,_ $¬-,→)∂⊂↓⊂␈␈zα ∞/1HJβ⊂αβ-,_ $≤-,→,8 αL-,__a ,X↓-,→ ∧`-,→+↓C0B$+↓" ε↓Zβg␈␈,87@`+↓∃[β`-,↓ $λ αGβ⊂_-,_ $N,8[βg␈␈Zαλ[αλβ∧O,X↓β⊂_-,→ &N $λ[β`Zαλ[αλβε[β`β2-,↓ $λ[β`Zαλ[αλ-,_ $O↓d↓,8 αGβ∧O,X↓-,→ &O $λ αG→¬_βε7B≥+↓∪ $≥[β`Zαλ[αλβ∧∨Zβ`AH0 B`+}/_π␈␈ $!Zβg␈␈,_α-,2↓@eβ_ $¬-,→-,_)∂⊂↓␈␈zα N∃↔⊃∀-,→ →  2 $E-,→∀¬¬⊂↓)∂⊂↓⊂↓⊂␈␈zα L	LY-,8 αL-,_¬O⊂↓␈␈zα 
KNu⊃β⊂ε-,→ $∀-,→-,_,X↓-,0↓BA→ ∧`-,→+↓C0B∃+↓/*α↓-,2AHε_¬%⊂↓␈␈zα JN5⊃-,→ $∀-,→ $λZβg␈␈↓@@eβ[αλβεN B` αL-,_¬"⊂↓␈␈zα K.5⊃-,→ _↓ $∀-,→ ε` $λZβg␈␈Zαλ[αλβεN
∧↓⊂+↓C0B∀+↓>Zβg␈␈,87@`+↓< αL-,2AHε_¬%⊂↓␈␈zα JN5⊃-,→ $∀-,→ εg␈␈ $λ↓@@eβ[β`βεN Bg␈␈ αL-,_¬"⊂↓␈␈zα K.5⊃-,→ _@↓β $∀-,→ BLZ¬` D`+↓1/_π␈␈_(⊂  α`-,ε+↓C0BM+↓BZ¬g␈␈ "∀-,1 εβ_ ∧LβεN+↓C "_-,ε/_↓π␈␈β.@S~+α	`  XDEFA1@h↓!∂⊂↓␈␈zα N∃↔∀@βλPβα_ $↓β↓Jε -,→-,_∂⊂␈␈zα =$f-,→ $∂-,0.Tε⊃→,x	8 ⊂↓D↓RPLACD↓A-ATOM-,↓∧Lε"⊂β,8,8α(Bπ␈{7 λ¬+↓P " -,ελ⊂"R+α∂[βg␈␈0B≥+↓i5F↓Y+∂⊂↓⊂␈␈zα H∂1HHZβLZαλ[αλβ∀@0-,_¬.⊂↓␈␈zα @N-¬A-,→ $∀-,→-,2AHε
_¬%⊂↓␈␈zα JN5⊃-,→ $∀-,→+↓`+∂⊂↓⊂␈␈zα H∂1HH⊂P2ZβLZαλ[αλ-,_¬P⊂↓␈␈zα A.-¬A-,→ $∀β↓Jε -,→-,_¬"⊂↓␈␈zα K.5⊃-,→ $∀-,1dβ→ BLZβg␈␈[αλ-,_ $¬-,→(→`⊂)∂⊂↓⊂␈␈zα ∞/1HJ-,_ $≤-,→,8 αL-,0↓@ε
_,X↓-,→ $ -,→+α∂0B$
ABA+↓l	∀¬Q⊂↓!∂⊂↓∀¬¬⊂↓)∂⊂↓⊂↓+∂⊂↓⊂α⊂↓␈␈zα⊂?Fd{∀-,_+α∂0B∃+↓z*α↓-,2AHε _¬%⊂↓␈␈zα JN5⊃-,→ $∀-,→ & $λ∧ε(Zβg␈␈[αλβλP B` αL-,_¬"⊂↓␈␈zα K.5⊃-,2↓@@→ $∀-,→ λ` &	 $λZβg␈␈Zαλ↓Eα[αλβλP+α∂0B∀+α
Zβg␈␈,87@`+αλ⊂→ dβ αL-,_¬%⊂↓␈␈zα JN5⊃-,→ $∀-,→αεαβ λg␈␈ & $λ[β`βλP Bg␈␈ αL-,_(→b¬"⊂↓␈␈zα K.5⊃-,→ $∀-,→ BLZ¬` D`λ_a +↓|/_π␈␈ α`-,ε+α∂0BM+α∞α↓D1Z¬g␈␈ "∀-,_ ∧LβλP+α∂ " -,0_
:⊃ε/_↓π␈␈+α
 (↓JASSOC ∧Aβ∧Q.TZαλ,xλ  ⊂α⊂β<CSD.GENESERETH>MACROS.LSP←1LSUBRZβ`,8,87@`λ 1+α→[β`[¬g␈␈-,_ ∧A-,_ BA∧0Z¬` D`+α∪/_π␈␈,X/_π␈␈,x](λεβ
 Rα∩↓MODEDECLAREFSUBR,8 $R/_π␈␈+↓]*@1↓
0Sα⎇↓*TERPRI↓*PRINC↓NDM-ERR,8βT↓`α ,XβαT _ "+Gx∂c←≥x␈e|∪p←J|↔r/F|'qoB↓y'b∨αtβλ
βq←G|∪pP∨∨x0 
P ⊂α≥↓NSM-ERR,8βT↓`α(,X~↓@βαT "+]xx∂I|Wp?D↓xoc␈	x(∂@|L⊂]ε⊂_
X ⊂α%↓SEL-ERR,8,8↓βT↓`α3 αg␈␈βαT7@`λ@`↓
+α2↓`α4[β`βαTZβ` B`+α.↓`α4 "β+4∧4∧|'r0∨βxp∂D|7r∂G|Or?D|qOB↔ _↓y∨a?→x/`␈)xOc␈≤∧
` _α+↓IA-ERR,8βT↓`α<↓P,XβαT "+Gx∂c←≥x␈e|πr?I|'p␈G¬kU ∧
h ⊂α9FSEL _∩∂⊂'⎇WB!∂⊂↓⊂↓$∂⊂↓⊂↓⊂↓⊂↓#⎇⊂↓V!∂⊂↓$∂⊂↓⊂↓⊂↓	λ∂!∂⊂↓⊂↓∪#"⎇⊂↓⊂↓∂⊂↓λ∂∃!O%⎇⊂↓¬B⊂↓⊂↓⊂↓.⎇∂⊂↓⊂↓⎇$⎇⊂↓⊂αP$∂⊂↓⊂↓⊂α⊂↓⊂↓⊂↓⊂α␈␈xXCONSASSQ,8,8↓5DαAβ∧(β-,≤+αc5BαN $N[β`β∧O,87@`λε↓↓+αLZ¬g␈␈[β`Zαλβ∧W Bg␈␈4BαK[¬g␈␈β∧W↓B
[¬`[∧⊂-,→+αMZ¬` D`+αD "β∧C/_π␈␈+αc,8π␈␈ $Oβ∧O $λ[βg␈␈_∧_β∧X B`4BαV[βg␈␈,8Z¬g␈␈Zβg␈␈β∧W,X↓βε
-,→ ∧g␈␈-,⎇/_π␈␈5Bαc $O↓@↓ αg␈␈β∧O,8,8π␈␈7@g␈␈+αb ∧g␈␈[βg␈␈↓@ 0Zαλβ∧W B`4Bαa[¬g␈␈[∧⊂-,→ ∧g␈~β∧∀β-,⎇+αcZ¬g␈␈ Dg␈␈+αZ "/_↓π␈␈βα`λ/_↓π␈␈,x
p _α?,8Z∧λZ∧⊂5Dαj[αλβdβ-,_Z¬`[∧⊂-,→ $_-,→λ↓@2+αr[αλ-,_Z¬`[∧⊂-,→ $_β0-,→,8Zβg␈␈Zαλ[αλ-,_,X↓β⊂ε¬-,→ $D-,→/_π␈␈,xβP ⊂αdW*]*PSTO D∩∂⊂#¬X⊂↓"∂⊂↓⊂↓⊂α␈␈xANDCDDAR X∩∂⊂∪∀"∂⊂↓$∀⊂↓⊂↓⎇⊂⎇⊂⊂↓#∀⊂↓#¬⊂↓_⎇⊂↓⊂↓⊂↓↓$%∀⊂↓⊂↓λ⎇∃∀¬λ⊂↓%∀⊂↓!∀⊂↓⊂α⎇⊂↓⊂↓⊂↓Y≤¬_⊂↓%∀⊂↓⊂↓λ⎇WB&∀⊂↓⊂↓Y∀⊂↓⊂↓⊂↓⊂↓λ∂&∀⊂↓⊂↓∪∀$⎇⊂↓$∀⊂↓#"∀⊂↓⊂↓λ∂∃!O%∀⊂↓¬B⊂↓⊂↓⊂↓.∀∂⊂↓⊂↓⊂↓P$∂⊂↓⊂↓⊂βλ⎇∃∀)O%⎇⊂↓¬B⊂↓⊂↓⊂↓∂!⎇⊂↓!∀⊂↓⊂α⎇⊂↓⊂↓⊂α	V%∀⊂↓⊂↓⊂↓⊂α⊂α⊂α␈␈xARGS↓GENSYM↓INTERN-,1↓↓↓∧Z,8,8π␈␈6@g␈␈+α{ ,β≤Z_`↓⊂βα[,8 αg␈␈βα_XC`,X+β↓[βZ4Bα␈↓Dε ∧`[βg␈␈-,_[¬Z-,→ B`Zβg␈␈⊃ `5Z¬Z DZ Bg␈␈+αu/_↓π␈␈+α	P _αsβλ∪ -,↓αL,8↓,8↓5Fβεβ∧0 "+βπ↓A@kP*ε↓βε/_↓π␈␈+α
⊂  βαDSSQ,8∧↓,8↓7@`+β∂[β`Zαλ2Bg␈␈+β
[β`+β∂¬`]Z¬` D`+β	 "/_↓π␈␈,x8 _βλ↓RETURNSU*UjuI1+NCONC↓EXPLODEN↓REGISTER \∩∂⊂↓#$∂⊂↓⊂↓∀¬*⊂↓!∂⊂↓⊂↓⊂↓	∪∀"∂⊂↓"∀⊂↓⊂↓\2]\⊂↓⊂↓⎇⊂⊂↓#∀⊂↓#¬λ⊂↓_⎇⊂↓⊂↓⊂↓λ⎇∃%∀⊂↓∃I]↑¬↑⊂↓⊂↓↑\⊂↓⊂↓⊂↓⎇⊂↓⊂↓⊂↓⊂α⊂↓⊂↓⊂α␈␈xSETQS ←∩∂⊂↓$!∂⊂↓⊂↓∀¬λ⊂↓!∂⊂↓)∂⊂↓⊂α⊂↓	∪∀!∂⊂↓"∀⊂↓⊂↓\2]\⊂↓⊂↓⎇⊂⊂↓#∀⊂↓∀¬⊂↓)∂⊂↓#¬λ⊂↓_⎇⊂↓⊂↓⊂α⊂↓λ⎇∃I]↑¬↑⊂↓⊂↓↑\⊂↓⊂↓⊂↓∃%∀⊂↓⎇⊂↓⊂↓⊂↓⊂α⊂↓⊂↓⊂α␈␈x↓IMPVARW+U.W↓SPECIAL ←∩∂⊂#¬`⊂↓"∂⊂↓⊂↓⊂α␈␈x↓EXPVAR `∩∂⊂#¬`⊂↓"∂⊂↓⊂↓⊂α␈␈x↓IMPFUN*EXPR a∩∂⊂#¬a⊂↓"∂⊂↓⊂↓⊂α␈␈x↓EXPFUN b∩∂⊂¬⊂↓⊂α␈␈xW+↑SPLIT b∩∂⊂¬⊂↓⊂α␈␈x↓UNSPLIT c∩∂⊂¬⊂↓⊂α␈␈x∃~∞;¬